home *** CD-ROM | disk | FTP | other *** search
- object DD: TDD
- Left = 502
- Top = 200
- ActiveControl = DropBox
- BorderIcons = []
- BorderStyle = bsToolWindow
- Caption = 'DD'
- ClientHeight = 80
- ClientWidth = 132
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- PopupMenu = PopupMenu1
- Scaled = False
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object DropBox: TPanel
- Left = 0
- Top = 0
- Width = 132
- Height = 80
- Align = alClient
- BevelInner = bvLowered
- BorderWidth = 1
- BorderStyle = bsSingle
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- OnDragDrop = DropBoxDragDrop
- OnDragOver = DropBoxDragOver
- OnMouseDown = DropBoxMouseDown
- OnMouseMove = DropBoxMouseMove
- OnMouseUp = DropBoxMouseUp
- object Image: TImage
- Left = 3
- Top = 3
- Width = 122
- Height = 70
- Hint = 'Drop box for Urls and files'
- Align = alClient
- ParentShowHint = False
- ShowHint = True
- OnDragDrop = DropBoxDragDrop
- OnDragOver = DropBoxDragOver
- OnMouseDown = DropBoxMouseDown
- OnMouseMove = DropBoxMouseMove
- OnMouseUp = DropBoxMouseUp
- end
- end
- object PopupMenu1: TPopupMenu
- Left = 66
- Top = 42
- object Downloading1: TMenuItem
- Caption = 'Drop Urls for downloading'
- Checked = True
- GroupIndex = 1
- RadioItem = True
- OnClick = Downloading1Click
- end
- object Files1: TMenuItem
- Caption = 'Drop local files for uploading'
- GroupIndex = 1
- RadioItem = True
- OnClick = Files1Click
- end
- object FTPUrls1: TMenuItem
- Caption = 'Drop Urls for FTP explorer'
- GroupIndex = 1
- RadioItem = True
- OnClick = FTPUrls1Click
- end
- object N1: TMenuItem
- Caption = '-'
- GroupIndex = 1
- end
- object BringFTPexplorer1: TMenuItem
- Caption = 'Bring FTP explorer ...'
- GroupIndex = 1
- OnClick = BringFTPexplorer1Click
- end
- object Bringdownloader1: TMenuItem
- Caption = 'Bring downloader ...'
- GroupIndex = 1
- OnClick = Bringdownloader1Click
- end
- object BringUploder1: TMenuItem
- Caption = 'Bring Uploader ...'
- GroupIndex = 1
- OnClick = BringUploder1Click
- end
- object BringUrlexplorer1: TMenuItem
- Caption = 'Bring Url explorer ...'
- GroupIndex = 1
- OnClick = BringUrlexplorer1Click
- end
- end
- object Titlebar1: TTitlebar
- Visible = False
- Left = 20
- Top = 42
- end
- end
-